<!--#include file="./top.asp"-->

<%
	dim rs_ind_english, str_ind_english, grade
	grade = request.QueryString("grade")
	set rs_ind_english = server.CreateObject("Adodb.Recordset")
	str_ind_english = "select * from ind_english where grade = '" & request.QueryString("grade") & "'"
	
	rs_ind_english.open str_ind_english, conn,1 ,3
%>

<div><a href="./index.asp">Homepage</a></div>

<!--#include file="list_english.asp"-->
<form action="update_ind_english.asp?grade=<%=request.QueryString("grade")%>" method="post" name="frm_ind_english">
<table border="1" width="80%">
	<tr>
  	<td>Subject: english</td>
  </tr>
  <%
		for i = 1 to rs_ind_english.fields.count - 1
	%>
  <tr>
  	<td><input type="text" size="150" name="rs_ind_english_<% response.Write cstr(i) %>" value="<%=rs_ind_english.fields(i)%>" /></td> 
  </tr>
  <%
		next
	%>
  <tr>
  	<td><input type="submit" value="Submit" /></td>
  </tr>
</table>
</form>
</body>
</html>
<%
	rs_ind_english.close
	set rs_ind_english = nothing
	conn.close
	set conn = nothing
%>